home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / dev / c / rot13.readme < prev    next >
Encoding:
Text File  |  1998-10-31  |  906 b   |  37 lines
  1. Short:    Rot13 'encoding' source code
  2. Author:   unknown
  3. Uploader: Andreas_Kleinert@t-online.de
  4. Type:     dev/c
  5.  
  6. ------------------------ snip -------------------------
  7.  
  8. /* rot13.c   Bei EBCDIC klappt das natuerlich nicht! */
  9.  
  10. #include <ctype.h>
  11. #include <stdio.h>
  12.  
  13. int main()
  14. {
  15.     int c;
  16.  
  17.     while ((c=getc(stdin))!=EOF)
  18.         putc(islower(c)? 'a'+(c-'a'+13)%26 :
  19.              isupper(c)? 'A'+(c-'A'+13)%26 : c, stdout);
  20.     return 0;
  21. }
  22.  
  23. ------------------------ snip -------------------------
  24.  
  25.  --
  26.  ARK, 19/Oct/98
  27.  
  28.  
  29. ============================= Archive contents =============================
  30.  
  31. Original  Packed Ratio    Date     Time    Name
  32. -------- ------- ----- --------- --------  -------------
  33.      272     191 29.7% 19-Oct-98 17:07:46 +rot13.c
  34.      511     295 42.2% 19-Oct-98 17:07:12 +rot13.readme
  35. -------- ------- ----- --------- --------
  36.      783     486 37.9% 19-Oct-98 22:11:14   2 files
  37.